object ReviseForm: TReviseForm
  Left = 0
  Top = 0
  Caption = #1040#1082#1090' '#1089#1074#1077#1088#1082#1080
  ClientHeight = 588
  ClientWidth = 858
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object lc1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 858
    Height = 588
    Align = alClient
    TabOrder = 0
    LayoutLookAndFeel = lcf1
    object grd1: TcxGrid
      Left = 10
      Top = 64
      Width = 250
      Height = 200
      TabOrder = 5
      LockedStateImageOptions.Effect = lsieDark
      LockedStateImageOptions.ShowText = True
      object v1: TcxGridDBTableView
        Navigator.Buttons.CustomButtons = <>
        DataController.DataSource = srcMakeOborot
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
        OptionsView.Indicator = True
        object clv1DATA: TcxGridDBColumn
          Caption = #1044#1072#1090#1072
          DataBinding.FieldName = 'DATA'
          Width = 92
        end
        object clv1SCHET: TcxGridDBColumn
          Caption = #1057#1095#1077#1090
          DataBinding.FieldName = 'SCHET'
          Width = 94
        end
        object clv1NOTE: TcxGridDBColumn
          Caption = #1050#1086#1084#1077#1085#1090#1072#1088#1080#1081
          DataBinding.FieldName = 'NOTE'
          Width = 198
        end
        object clv1PSUMMA: TcxGridDBColumn
          Caption = #1053#1072#1095#1080#1089#1083#1077#1085#1080#1103
          DataBinding.FieldName = 'PSUMMA'
          Width = 91
        end
        object clv1RSUMMA: TcxGridDBColumn
          Caption = #1054#1087#1083#1072#1090#1099
          DataBinding.FieldName = 'RSUMMA'
          Width = 103
        end
        object clv1CURRSUMMA: TcxGridDBColumn
          Caption = #1058#1077#1082'. '#1086#1089#1090#1072#1090#1086#1082
          DataBinding.FieldName = 'CURRSUMMA'
          Width = 128
        end
      end
      object l1: TcxGridLevel
        GridView = v1
      end
    end
    object dt1: TcxDateEdit
      Left = 81
      Top = 10
      Properties.ValidationOptions = [evoRaiseException, evoShowErrorIcon]
      Properties.OnValidate = dt1PropertiesValidate
      Style.HotTrack = False
      TabOrder = 0
      Width = 121
    end
    object dt2: TcxDateEdit
      Left = 229
      Top = 10
      Properties.ValidationOptions = [evoRaiseException, evoShowErrorIcon]
      Properties.OnValidate = dt1PropertiesValidate
      Style.HotTrack = False
      TabOrder = 1
      Width = 121
    end
    object cbb_KONTRAGENT: TcxLookupComboBox
      Left = 81
      Top = 37
      Properties.DropDownSizeable = True
      Properties.ImmediatePost = True
      Properties.KeyFieldNames = 'CODE'
      Properties.ListColumns = <
        item
          FieldName = 'NAME'
        end>
      Properties.ListOptions.ShowHeader = False
      Properties.ListSource = cmDb.src_KONTRAGENT
      Properties.ValidationOptions = [evoRaiseException, evoShowErrorIcon]
      Properties.OnValidate = cbb_KONTRAGENTPropertiesValidate
      Style.HotTrack = False
      TabOrder = 2
      Width = 145
    end
    object btnLoad: TcxButton
      Left = 356
      Top = 37
      Width = 123
      Height = 21
      Caption = #1054#1073#1085#1086#1074#1080#1090#1100
      OptionsImage.ImageIndex = 9
      OptionsImage.Images = cmDb.iml1
      TabOrder = 3
      OnClick = btnLoadClick
    end
    object btnExcel: TcxButton
      Left = 485
      Top = 37
      Width = 52
      Height = 21
      Caption = 'Excel'
      OptionsImage.ImageIndex = 16
      OptionsImage.Images = cmDb.iml1
      PaintStyle = bpsGlyph
      TabOrder = 4
      OnClick = btnExcelClick
    end
    object grp1: TdxLayoutGroup
      AlignHorz = ahClient
      AlignVert = avClient
      ButtonOptions.Buttons = <>
      Hidden = True
      ShowBorder = False
      Index = -1
    end
    object grplc1Group1: TdxLayoutGroup
      CaptionOptions.Text = 'New Group'
      Parent = grp1
      ButtonOptions.Buttons = <>
      ShowBorder = False
      Index = 0
    end
    object grplc1Group2: TdxLayoutGroup
      AlignHorz = ahClient
      AlignVert = avClient
      CaptionOptions.Text = 'New Group'
      Parent = grp1
      ButtonOptions.Buttons = <>
      ShowBorder = False
      Index = 1
    end
    object itmlc1Item1: TdxLayoutItem
      AlignHorz = ahClient
      AlignVert = avClient
      CaptionOptions.Text = 'cxGrid1'
      CaptionOptions.Visible = False
      Parent = grplc1Group2
      Control = grd1
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object itmlc1Item11: TdxLayoutItem
      CaptionOptions.Text = #1055#1077#1088#1080#1086#1076' '#1089':'
      Parent = grplc1Group3
      Control = dt1
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object itmlc1Item12: TdxLayoutItem
      CaptionOptions.Text = #1087#1086':'
      Parent = grplc1Group3
      Control = dt2
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object itmlc1Item13: TdxLayoutItem
      AlignHorz = ahLeft
      CaptionOptions.Text = #1054#1088#1075#1072#1085#1080#1079#1072#1094#1080#1103
      Parent = grplc1Group4
      SizeOptions.AssignedValues = [sovSizableHorz]
      SizeOptions.SizableHorz = True
      SizeOptions.Width = 340
      Control = cbb_KONTRAGENT
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object grplc1Group3: TdxLayoutGroup
      CaptionOptions.Text = 'Hidden Group'
      Parent = grplc1Group1
      ButtonOptions.Buttons = <>
      Hidden = True
      LayoutDirection = ldHorizontal
      ShowBorder = False
      Index = 0
    end
    object itmlc1Item14: TdxLayoutItem
      CaptionOptions.Text = 'cxButton1'
      CaptionOptions.Visible = False
      Parent = grplc1Group4
      Control = btnLoad
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object grplc1Group4: TdxLayoutGroup
      CaptionOptions.Text = 'Hidden Group'
      Parent = grplc1Group1
      ButtonOptions.Buttons = <>
      Hidden = True
      LayoutDirection = ldHorizontal
      ShowBorder = False
      Index = 1
    end
    object itmlc1Item15: TdxLayoutItem
      CaptionOptions.Text = 'cxButton1'
      CaptionOptions.Visible = False
      Parent = grplc1Group4
      Control = btnExcel
      ControlOptions.ShowBorder = False
      Index = 2
    end
  end
  object lf1: TdxLayoutLookAndFeelList
    Left = 760
    Top = 120
    object lcf1: TdxLayoutCxLookAndFeel
      LookAndFeel.NativeStyle = False
    end
  end
  object prop1: TcxPropertiesStore
    Components = <
      item
        Component = cbb_KONTRAGENT
        Properties.Strings = (
          'EditValue')
      end
      item
        Component = dt1
        Properties.Strings = (
          'Date')
      end
      item
        Component = dt2
        Properties.Strings = (
          'Date')
      end>
    StorageName = 'prop1'
    Left = 728
    Top = 120
  end
  object dsMakeOborot: TpFIBDataSet
    SelectSQL.Strings = (
      'SELECT'
      '    DATA,'
      '    SCHET,'
      '    NOTE,'
      '    PSUMMA,'
      '    RSUMMA,'
      '    CURRSUMMA'
      'FROM'
      '    MAKEKONTRAGENTOBOROT(:D1, :D2,'
      ':KONTRAGENT) ')
    Transaction = cmDb.RT
    Database = cmDb.DB
    UpdateTransaction = cmDb.WT
    Left = 272
    Top = 296
  end
  object srcMakeOborot: TDataSource
    DataSet = dsMakeOborot
    Left = 302
    Top = 296
  end
end
